100 REM PROGRAMM ZUR DEFINITION EINES
110 REM NLQ-ZEICHENS AUF DEM STAR NL-10
120 :
130 OPEN 4,4
140 PRINT#4,CHR$(27)CHR$(120)CHR$(49);
150 PRINT#4,CHR$(27)CHR$(58)CHR$(0)CHR$(0)CHR$(0);
160 PRINT#4,CHR$(27)CHR$(38)CHR$(0)CHR$(64)CHR$(64);
170 FORI=0TO46
180 READM
190 PRINT#4,CHR$(M);
200 NEXTI
210 PRINT#4,CHR$(27)CHR$(37)CHR$(49)CHR$(0);
220 PRINT#4,"OMEGA : ";
230 FORI=1TO10
240 PRINT#4,CHR$(64)" ";
250 NEXT
260 PRINT#4
270 CLOSE4:END
1000 REM DATEN DES NLQ-ZEICHENS
1005 :
1006 REM DATUM FUER UNTERLAENGE
1010 DATA 128
1015 :
1016 REM DATEN FUER 1. DRUCKDURCHGANG
1020 DATA   0,  1,  0, 56, 64,  4,  4
1030 DATA 131,128,128,128,128,128,128
1040 DATA 128,131,  4,  4, 64, 56,  0
1050 DATA   1,  0
1055 :
1056 REM DATEN FUER 2. DRUCKDURCHGANG
1060 DATA   0,  3,  1,113,  9,129,129
1070 DATA   7,  0,  0,  0,  0,  0,  0
1080 DATA   0,  7,129,129,  9,113,  1
1090 DATA   3,  0